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SUMMARY 


The goal of this project was to develop a system for varying 
the spacings between soybean plants as they grow to maximize the 
number of plants grown in a given volume. The project was 
studied to aid in the development of NASA's Controlled Ecological 
Life Support System (CELSS) . The resulting design consists of 
plant trays which are three dimensional trapezoids arranged into 
circles in a compact geometrical configuration. These circles 
are stacked together in back to back pairs to form a long 
cylinder. In each growth tray, plants will be housed in 
individual containers containing a nutrient delivery system and a 
plant support mechanism. Between the containers, a "half" 
trellis has been designed to space the plants for maximum space 
efficiency. The design allows for localized seeding and 
harvesting mechanisms due to the chambers' geometrical 
configuration. In addition, the components have been designed 
for ease of cleaning and minimal maintenance. Next semester, the 
individual components will be constructed and tested to determine 
the success of the design. 
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INTRODUCTION 


Problem Def iftitjop 

Conservation of vehicle space is crucial since there is a 
limited volume available. Focusing on the space allotted for 
growing plants, research must be undertaken to develop a system 
to maximize the use of this space. Plants such as soybeans 
require less space to grow as a seedling than they do as a mature 
plant ready for harvesting. There is potential for utilizing 
this size difference as a foundation on which to conduct 
pertinent research in the area of optimizing plant spacing. 

Project Description 

The purpose of this project is to design and build a system 
for growing plants in space. This design will conserve space and 
maximize the number of plants per volume by spacing plants for 
maximum space efficiency. Preliminary investigations have been 
directed toward soybean plants since soybean plants require 
horizontal and vertical spacing unlike other crops like wheat 
which only require vertical spacing [7]. Results of a three 
dimensional space saving design are potentially more valuable 
than that of one or two dimensional design. 

Design Criteria 

Based on NASA's guidelines for research on CELSS [1], the 
following general design criteria have been established for this 
project: 


1. There should be three dimensional plant spacing to 
minimize volume required for growing plants. 

2. Production of soybeans should be continuous. 

3. System weight should be minimized. 
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4. Nutrients must be contained and shielded from light. 

5. The plants must be rigidly supported. 

6. Air circulation must be provided from root to canopy. 

7. Each plant must be provided adequate lighting. 

8. Maximum utilization of automation should be used to 
minimize the duties of the crew. 

9. Access, to seeding and harvesting mechanisms should be 
incorporated into the design. 

10. An automated system should be able to clean and 
reprocess the growth medium. 

11. There should be a minimum of maintenance on components 
and any required maintenance should be capable of being 
performed by an automated system. 


Some of the above criteria were considered more carefully 
than others. The primary criteria are: 

1. There should be three dimensional plant spacing to 
minimize volume required for growing plants. 

2. Nutrients must be contained and shielded from light. 

3. The plants must be rigidly supported. 

4. Maximum utilization of automation should be used to 
minimize the duties of the crew. 

5. Access to seeding and harvesting mechanisms should 
be incorporated into the design. 

6. An automated system should be able to clean and 
reprocess the growth medium. 


Background Information 

The design of an independent, self-sustaining plant growth 
chamber will become increasingly important to the future of food 
production. Its importance lies in the ability of a plant growth 
chamber to support human life in a wide variety of environments. 
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Plant growth chambers will realize their potential in manned, 
deep space exploration, where storage and weight restrictions 
necessitate the efficient production of food crops. 

Plant growth systems have been previously created which 
incorporate hydroponics into the design to maximize production in 
a minimum of space [1,2, 3, 4, 5]. Most of these designs that alter 
the spacing between plants during growth do not provide for 
expansion in more than one or two dimensions. 
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CONCEPTS AND DESIGNS 


geometrical Configurations 

The initial stages of investigation involved examining 
existing systems for growing plants in space [1,2, 3, 4 ,5]. These 
were evaluated and used as references for preliminary designs. 

Trav shape. In designing a tray to hold the plants, the 
approach taken was to custom fit a tray to the plants. This 
approach facilitates a better solution to the problem of tray 
shape than to fit plants to a tray. Due to the sigmoidal growth 
curve for soybean plants (Figure 1) , the natural spacing of the 
rows would be in the shape of a sigmoid curve. As a result, the 
trays should be constructed into trapezoids along the horizontal 
and vertical planes approximating the sigmoid lines (Figure 2) . 

Integration of Gr owth Travs into Chambers. Simplified paper 
models of the trapezoidal shape were constructed and arranged 
like building blocks into many different configurations. These 
models helped visualize the three dimensional shape of the growth 
chamber. 

Integration with Planting and Harvesting Systems . An 
automated process would be responsible for planting. Seeding 
would entail placing a germinated seed onto or into the support 
device where it would grow. The growth trays will be shaped and 
configured to allow the seeding mechanism to perform its task 
easily and as quickly as possible. 

Likewise, the configuration of the plants in the tray must 
allow for the mature plants to be harvested without disturbing 
the other plants. Cutting the stem above the supporting 
mechanism would easily separate the canopy area from the root 
area. The edible portion would be transported to a processor to 
make food, and the cleaning system would remove the root portion. 
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Plant Movement 


Varying Plant Spacing Purina Growth . Varying the spacing of 
the plants is essential for conservation of space. One method 
developed was a mechanical "half trellis (Figures 3a, 3b). This 
trellis would support each individual plant in a separate 
container and would facilitate the independent movement of the 
plants. The trellises would provide stable, predictable 
expansion since they are constructed of rigid materials. Ends of 
the trellises will travel in tracks placed at the sides of the 
growth chamber. Nonlinear spacing of the plants is enhanced • 
because as the trellis is expanded as it proceeds through the 
chamber, it also becomes thinner, providing movement 
perpendicular to the expansion of the trellis. 

A computer program was written to animate the trellis design 
to help visualize how the individual plants would move as the 
trellises were expanded (Appendix A) . The program enables the 
user to adjust the number of plants on a trellis, the number of 
trellises on a tray, and the maximum to minimum width ratio of 
the supporting track. The current version (V 1.0) of the program 
only allows for single step trapezoids, but later versions will 
allow two step trapezoids. Other future enhancements include 
having the program pack the rows together as closely as 
geometrically possible while evenly scaling the ages of the rows 
of plants. This will help determine the function required to 
move the endpoints of the trellises along the track. 

An alternate system for plant spacing is an accordion tube. 
It is similar to a design referred to as an accordion tray [1]. 
The accordion tube system is simply a single row of plants on an 
expandible tube (Figure 4) . By having single rows of plants, the 
tubes may be spaced separately and add another dimension of 
expansion over the existing method. The tube is a small hose 
which resembles a dryer hose. Holes for plant stems are placed 
at regular intervals along the tube. 
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Figure 4. Accordian Tube System 

Varying Row Spacing . There are several different methods 
for moving the rows of plants apart. The first is a simple 
motorized robot. Two linear stepper motors with simple grasping 
or pushing mechanisms would travel along the outside of the 
growth trays. The motors would be controlled by a computer. 

This system would be reprogrammable in mid flight. 

A similar motorized system that is spaced by mechanical 
stops along a track instead of a computer was also studied. This 
system would not be adjustable once the track was constructed. 

Another system involves having mechanical levers or linkages 
alter the space between rows in proportion to the amount that the 
rows are stretched [5]. This design is also non adjustable once 
it is constructed. 

Plant Growth 

Each plant could grow in containers that support individual 
plants or in large containers that support many plants. 

Regardless of the number of plants per container, the containers 
must provide nutrients, stem support, and a mechanism for plant 
spacing. 
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Figure 5a. Membrane Sac Delivery System 
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Figure 5b. Membrane Barrier Delivery System 
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Nutrient delivery . Two possible designs were developed for 
the nutrient delivery system: A membrane n sac N and a membrane 

barrier. The membrane "sac" is a membrane shaped into a tube; 
the ends of the tube serve as input and output locations for the 
nutrients (Figure 5a) . The roots would grow around the membrane 
"sac" and would obtain the nutrient solution due to surface 
tension of the roots on the membrane and pressure differences 
between the atmosphere and the nutrient inside the membrane. 

The membrane barrier design has a membrane stretched through 
the center of the plant container (Figure 5b) . It separates the 
nutrient solution from the roots and provides a planar barrier as 
compared to the membrane "sac" which is cylindrical. 

One drawback to both of these designs is that the container 
will be the same size for a seedling and a mature plant. There 
is a minimum root area that will support a mature plant. This 
area will limit the minimum size of the container and as a 
result, limit the ability to conserve space. 

Plant support . Several different methods were developed for 
supporting the plants. They are: pneumatic donut, rubber 

diaphragm, and foam rubber. The pneumatic donut consists of an 
inflated circular tube shaped like a donut with the plant stem 
supported in the middle (Figure 6a) . As the stem increases in 
thickness, the donut would slowly release air and decrease the 
pressure on the stem. 

Each row of plants in this design must have a feedback 
mechanism to sense as well as vary the pressure in the donuts. 
Since the donut would be very difficult to manufacture with the 
resources available, this design was not tested. 

The rubber diaphragm consists of four separate pieces of 
rubber sheeting with four equally spaced diametrical cuts in each 
piece. The four sheets are stacked on top of each other offset 
at 11.25 degrees (Figure 6b). This forms a very tight closure 
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around the opening. A model of the rubber diaphragm design was 
built from drafting film instead of rubber and was tested for its 
ability to support a wooden shaft. 

0 

CKf 

INFLATABLE 
DONUT 
a. 

Figure 6. 

The foam rubber design is very simple (Figure 6c) . It 
consists of two rectangular pieces of foam placed over the 
opening of the container. The seed or stem would easily be held 
in place and would not constrict the stem. This design is very 
inexpensive, lightweight, simple to operate, has low maintenance, 
and simple to manufacture. 

Cleaning and Maintenance 

Cleaning . The independent plant containers would need to be 
refurbished before replanting soybeans in them. The optimal 
design would not interrupt the movement of the containers through 
the chamber but should allow the containers to be properly 
cleaned without removing them from the tray. The biomass in the 
container must be removed before the containers could be 
sterilized. This could be accomplished through an automated 
process where the containers could be opened and washed. 
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Maintenance . Since the duration of the proposed mission 
would be approximately three years [9], maintenance requirements 
are an essential aspect in the design of all components. All 
parts should be able to endure the entire mission or be 
serviceable in flight with a minimum of spare parts. Materials 
should be carefully selected because parts would be turning or 
sliding across each other or flexing repeatedly. 

Any maintenance duties required would be performed by an 
automated system, or a crew member if only occasional light 
maintenance was required. The equipment needed for maintenance 
should be as small and light as possible. 
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RESULTS TO DATE * 


Geometrical Confi gurations 

Trav Shape . In order to maximize space utilization, plants 
will be arranged in rows with equally aged plants in the same row 
and spacing will expand to follow the natural growth shape for 
the plants. The simplified shape is a trapezoidal shape 
approximating the sigmoid growth curve. When the plants are 
growing in the trays along each row, both the width and height 
will vary sigmoidally. 



Figure 7. Cylindrical Growth Tray Arrangement 

Integration of Growth Travs into Chamber . Through the 
design of paper models of the growth trays, the most efficient 
design consisted of trays arranged in a circles, two circles 
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placed back to back against each other, and circle pairs stacked 
on top of each other (Figure 7). This configuration forms a near 
perfect cylinder, which would be compatible with the space 
shuttle cargo bay [1]. 

This arrangement spaces the growth trays efficiently, but 
the overall cylinder has several empty spaces. One empty space 
occurs in the center of each circular pair of trays. In 
addition, triangular shaped empty spaces near the perimeter of 
the chamber were created that run uninterrupted for the entire 
length of the cylinder. There is also a cylindrical empty space 
that runs lengthwise in the chamber. 

The efficiency of this configuration was calculated for a 
set of estimated values (Appendix B) . The estimations and 
assumptions for the calculations were: 

1. A mature soybean plant is 3 feet high and 1 foot wide. 

2. A soybean plant reaches maturity height in 40 days and is 
harvested after 80 days. 

3. A soybean plant will grow with roots contained to a 
volume of 3. 5x3. 5x3 to 4 inches deep. 

4. Cylinder size inside diameter is 13 feet 8 inches [1]. 

Calculated volume of plant growth and support area took up 
70.3% of the volume and the remaining 29.6% was empty space for 
equipment and storage. The total volume of one circle of trays 
and empty space was 1,054,000 in 3 and contained 168 plants. A 
control volume consisting of concentric circles of plants at 
maturity including lighting and support totalled 1,014,000 in 3 
and contained only 142 plants. The volume per plant ratio for 
the plant area only decreased by 46% under the control 
configuration. Volume per plant ratio including support and 
lighting but without empty space was 38% less and 12% less when 
including empty space. This shows that space is conserved even 
under the worst case situation. A realistic value for space 
reduction is 38% when empty spaces are utilized for other 
purposes. 
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The empty spaces could be used in a number of ways. For 
example, the space in the center could be utilized for seeding 
equipment, storage, or any other equipment that would require a 
large unpartitioned space. Also, different crops could utilize 
some or all of these empty spaces. The triangular and 
cylindrical spaces running the length of the cylinder would be 
well suited for air ducts, nutrient tubing, electrical cables, or 
pathways for moving materials or allowing crew members to move 
between levels of circular trays. 

integration with Planting and Harvesting Systems. The 
support containers will be seeded in a row at one end of the 
tray. The seedling side of each tray forms a circle in the 
center of the chamber. The centralization of the containers to 
be seeded facilitates uncomplicated incorporation of the seeding 
mechanism into the chamber design. 

A similar situation exists with the mature plants which are 
located at the perimeter of the growth chamber. This allows the 
harvester to move on a track along the outside of the trays to 
gather all the mature plants. 



Figure 8. Plant Spacing During Growth 
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Plant Movement 


Varying plant spacing during growth . Initial experiments 
showed that the trellis design will be able to perform the task 
of spacing the plants in rows quite efficiently. Problems arose 
when integrating the trellis design into the current tray and 
chamber configuration. The trellises must travel in a plane 
during the rapid growth stages and then shift to an intersecting 
plane (Figure 8) . The trellises must travel across this 
discontinuity and still support the plants vertically. 

The accordion tube has many flaws. One major drawback with 
the accordion tube design is the large expansion required. The 
hose must be able to expand at least four times its relaxed 
length to allow a plant 3 square inches to grow to 1 square foot 
[6]. This design would also be difficult to clean and reprocess 
because there would be no way tp open the tube up for cleaning 
and successfully reseal it. For these reasons, the trellis 
design is preferred over the accordion tube. 

Varying Row Spacing . The preferred method for varying the 
spacings between rows is using a limited robot system controlled 
by a computer. This is merely a conceptual design thus no 
further research will be performed in this area. 

Elant growth 

Nutrient delivery . The membrane barrier was chosen as the 
preferred design for. nutrient delivery. It is simpler to build 
and maintain than the membrane sac. The membrane barrier design 
facilitates removal of the plant roots from the container for 
cleaning without disturbing the membrane. Also, the membrane 
barrier lends itself to other potential designs. For example, 
the use of a more durable, porous metal such as stainless steel 
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could be developed as a barrier [5]. If the membrane should fail 
on one of the containers, provisions in the design have been made 
to allow replacement of the membrane. 

Plant support . The rubber diaphragm model constructed 
proved to be Successful in its primary goal of rigidly supporting 
the wooden shaft at all angles of rotation, but had undesirable 
side effects. One problem with this system is that the diaphragm 
cannot accept a seed very easily. The diaphragm provides support 
at a very thin ring around the stem or seed, and the seed would 
easily slip out if not placed exactly in the center. A seedling 
would adapt more easily since it would be less prone to slip out. 

Another problem discovered while testing the model was that 
considerable force was exerted on the shaft. If this were a 
plant stem, the excessive force might injure the plant [8]. The 
force was not measured, nor is a value of maximum force allowable 
on a stem known, but because of this force, this design may not 
be investigated next semester. 

The design offering the most promising results is the foam 
rubber technique. It is simple, easy to construct, and performs 
the task of supporting the plant early in the growth stage. As 
the plant becomes larger, the roots will slowly enlarge and 
completely fill the root area in the container. The roots will 
then support the plant as a normal plant would in soil. Because 
of the simplicity of the foam design, this will be the design 
that will be constructed and tested next semester. 

Cleaning and Maintenance 

Cleaning . The plant containers were designed with a hinged 
lid on the container for access to the roots left behind by the 
harvester (Figure 9) . An automated process will open the 
containers while they are on the underside of each tray and 
remove the root masses. The containers will then be cleaned by 
chemical and physical means. A cleaning solution may be pumped 
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through the nutrient delivery system to cleanse the membranes. 
The cleaning portion of the design is conceptual and will not be 
constructed or tested. 



Figure 9. Cleaning of Plant Growth Containers 

Maintenance . The plant containers were also designed to 
allow replacement of the membrane (Figure 5b) . The membrane to 
be used is a plastic PVC based membrane that looks like paper 
[5]. The membranes should be able to perform for the entire 
length of the mission. If one should fail, the membranes are 
replaceable by crew or automation. Screws are removed from the 
bottom of the container, the base separated from the lower lid, 
and the membrane removed. A new membrane is slipped in place and 
the screws re-installed. A watertight seal is provided by rubber 
gaskets attached to the base and lower lid. 
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CONCLUSION 


The designs presented constitute the components of a system 
for varying the spacings between soybean plants. The overall 
shape of the growth trays, as determined by the growth curve for 
soybeans, is a three dimensional trapezoid. These trays are 
arranged into pairs of circles back to back and stacked for the 
entire length of a large cylinder. Within the growth trays, 
plants will be housed in individual containers incorporating a 
nutrient delivery system and a plant support mechanism. 

Nutrients will be provided by a sheet of PVC membrane. The 
plants will be supported by being placed in between two pieces of 
foam. Individual containers will be spaced by a half trellis 
designed to vary the distance between plants for optimum volume 
usage. The design allows for localized seeding and harvesting 
mechanisms. In addition, the components have been designed for 
minimal maintenance and ease of cleaning. 

Initial calculations from estimates on plant growth indicate 
that 38% less volume is required to grow a soybean plant using 
the tray and chamber configurations developed. This value is 
comparing the area required per plant in the trapezoidal 
configuration versus a cylinder housing concentric circles of 
plants. 
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PLANS FOR SECOND SEMESTER EFFORT 


In the second semester, more data will be gathered in the 
area of soybean growth. More detailed data on the rate of growth 
at each stage of plant growth is required to quantitatively 
design a system for maximum efficiency to conserve space. Once 
detailed data is gathered and incorporated into the design, then 
a definite quantitative value of the efficiency may be calculated 
to determine the overall success of the project. 

Also in the second semester, the trellis and membrane 
barrier designs will be constructed and tested. A test bed to 
hold the trellises has already been constructed. Modifications 
to the trellis design and other spacing methods such as the 
accordion tube will also be tested as well. A plant container 
will be constructed using the membrane barrier design. It will 
be tested with live plants to determine whether the roots will 
have enough area to grow in. If both of these systems succeed, 
then a final model will be built and retested. 
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APPENDIX A 


Trellis Animation Program 

The following is the listing for the trellis animation 
program . The program was written in C on an Amiga 1000 computer. 
The purpose of the program was to help visualize the effects of 
plant spacing for the half trellis design. 
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rm=75 

include <intuition/intui t ion. h> 

•include <gr aphics/di spl ay . h> 

•include <graphics/gf xbase. h> 

•include <graphics/gfxmacros.h> 

•include < exec /memory. h> 

•include <exec/execbase.h> 

•include <stdio.h> 

•include <hardwar e/custom. h> 

•include <hardware/dmabi ts. h> 

•include <1 ibrar i es/dos. h> 

•include <math.h> 

/* 

******************************************************** 

* 

* Simulations of support and expansion mechanisms. 

* Jim Bledsoe Nov 1987 University of Florida EGM 
4000/1 

* For the NASA CELSS project and the USRA. 

* 

******************************************************** 

extern void *0penLibrary O ; 
extern struct Screen *OpenScreenO ; 
extern struct Window *OpenWindowO ; 
extern struct IntuiMessage *GetMsg()j 
extern struct MsgPort *CreatePort O ; 

•define IBPtr struct Intui t ion Base * 

•define GBPtr struct GfxBase * 

•define OneHundred 100.0 

•define ScreenX 640L 
•define ScreenY 200L 

•define ScreenMode HIRES /*HIRES, INTERLACE, and 
NULL*/ 

struct Intui tionBase *Intui t ion Base; 

struct GfxBase *GfxBase; 

struct Window *w ■ NULL) 

struct Screen *s =* NULL; 

struct ViewPort *vp « NULL; 

struct RastPort *rp = NULL; 

struct BitMap bmbuff; 

struct RastPort rpbuff; 

struct TmpRas tmpras; 

UBYTE dobuf fer C201 - "0"; 

UBYTE undobuf fer C201 « "0"; 
struct IntuiText 

t0,tl,t2,t3,tl0,tll,t 12, t20, t21 , t22, t30, t31 ; 
struct Menultem 
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mO, ml , m2, m3, mlO, mi 1 , ml2, m20, m21 , m22, m30, m31 ; 
struct Menu menu 1 , menu2,menu3,menu4, menus' top) 

PLANEPTR area_r aster = NULL; 

PLANEPTR area”rast er 2 =* NULL; 

LONG trayul x, trayuly, trayur x, trayury; 

LONG trayllx,traylly,traylrx,traylry; 

LONG xdi f f ,ydi f f ; 

FLOAT mx,my; 

USHORT animate flag » FALSE; 

USHORT done ■ FALSE; 

USHORT gad.added « FALSE; 

LONG num_segs, num_.tr els, max_st ret ch_angl e, timeconst ; 
LONG num_divs; 

FLOAT bar_length; 
struct trellis < 

FLOAT Y; 

USHORT Visible; 

LONG PI an tSize; 

>» 

struct trellis trel larrayC51 3 ; 

struct Stringlnfo info * i 

dobuffer, undobuffer, 0,20,0, 0,0, 0,0,0, 0,0, NULL 

>> 

USHORT BorderVectorsC 3 ■ <0,0,206,0,206, 13,0, 13,0, 0>; 
struct Border gborder ■ < 

-2,-3, 3,0,JAN1, 5, BorderVectors, NULL 

struct IntuiText gtext « i 

3, 0, JAM2, 79,12, NULL, "Input window !•?•", NULL 

>; 

struct Gadget gadget • i 

NULL, ScreenX/2-102, 80, 203,10, GADGHCOMP, 

LONGINT } REL VERIFY J STR I NGCENTER , 

STRGADGET, (APTR)Stgborder , NULL, &gtext, 0, 
<APTR)««info, 1,NULL 
>» 

struct NewSc reen ns * i 

0, 0, ScreenX, ScreenY, 3, 5, 1, ScreenMode, 
CUSTOMSCREEN, NULL, 

"Graphical simulation of a Trellis support. VI. 01", 
NULL, NULL 
>S 

struct NewUlindow nw * { 

0, 2, ScreenX, ScreenY-2, 5, 1, 

MENUPICK ! CLOSEWINDOW i GADGETUP, 

WINDOWCLOSE ! WINDOWDEPTH i ACTIVATE ! SMART_REFRESH , 
NULL, NULL, "Graphical simulation of Trellis support. 
VI. 01", 
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NULL, NULL, O, 0, Sc reenX, ScreenY, CUSTOMSCREEN 

>? 

..animateO C 

register USHORT i,j; 
static LONG xl,xr,dy,y; 
static LONG sx,sy; 
static FLOAT yprop,x,ddx; 

Set Rast < itr pbu f f , OL ) ; 

draw_tray < ) j 

SetAPen (&rpbuf f , 1L) ; 

for (i®0; i<num_trels; i++) < 

x ■ sqrt (trel larrayCi 3. Y*OneHundred) + 
t imeconst/OneHundred; 

if (x > OneHundred) x -■ OneHundred; 
trel larrayCi 3 . Y » x*x/OneHundred ; /^function of 
movement*/ 

yprop « trellarrayCi 3. Y/OneHundred; 

xl » trayllx - (LONG) <xdi f f *yprop) | 

xr * traylrx + (LONG) (xdi f f*yprop) ; 

y ■ traylly - (LONG) (ydi f f*yprop) ; 

ddx ■ (FLOAT) (xr - xl ) /num_di vs; 

dy * sqrt (bar length*bar_length - ddx*ddx); 

Move (fcrpbuff, (LONG) (xl*mx) , (LONG) (y*my)); 
for (j*l; j<num_segs; j++) ( 

' »x ■ xl + (1 + 2*(j-l))*ddx; 
sy ■ (jX2) ? y + dy » y - dy; 

DravK&rpbuff, (LONG) (sx*mx), (LONG) (sy*my>); 

> 

Dr aw(&rpbuf f , (LONG) (xr*mx), (LONG) (y*my)); 
Draw(&rpbuff , (LONG) (xl*mx) , (LONG) (y*my) ) ; 

> 

ClipBlit (fcrpbuff, 4,12, rp, 4,12, 

Scr eenX-8, ScreenY-14, OxCO); 

> 

init trellisesO ( 
register USHORT i) 
for (i*0; i<50; i++) < 
trel larrayCi 3. Y » 0.0; 
trel larrayCi 3. Visible » FALSE; 

trellarrayCi 3.PlantSize = 10; /Knot implemented 

yet*/ 

} 

for (i=0; i<num_trels; i++) ( 
trellarrayCi 3. Y = 

OneHundred*! *i /num_trels/num_trels; /^function of 
motion*/ 

trel larrayCi 3. Visible « TRUE; 

trellarrayCi 3. PlantSize = 10; /*not implemented 

yet*/ 

> 

37 



> 


get_input() i 

ULONG class, cod*, value; 

ULONG menu_num, item_num; 
struct Gadget *gadgptr; 
struct I ntui Message ftmessage; 
whi le( (message” (struct IntuiMessage 
# ) Get Msg ( w- >User Por t ) ) ! ”NULL ) < 
class = message- >C lass; 
code ” message- >Code; 

if ((class ”” GADGETUP) !l (class ”” GADGET DOWN) ) 

< 

gadgptr = (struct Gadget #) message- > I Address; 
printf ("Illegal ! there aren’t supposed to be 
any gadgets !! \n" ) ; 

> 

Rep 1 y Msg ( message ) | 
switch (class) < 
case CLOSEW I NDOW i 
done ” TRUE; 
break; 

case MENUPICK* 

menu num » MENUNUM(code) ; 
i t em”num » ITEMNUM(code) ; 
i f (menu_num””0) i 

switch (item_num) < 
case Oi 

newmaxa 

value ■ prompt_mes( "Enter new top 

width (10-960)", 

10, 960, trayur x-trayul x) ; 
if (vaiue<traylr x-trayl 1 x) goto 

newmax; 

trayulx “ 500 - value/2; 
trayurx ” 500 + value/2; 
calc_consts( ) ; 
break; 
case la 


newmina 

value ” prompt_mes( "Enter new bottom 

width (10-950)", 

10, 950, t r ay lr x-trayl lx); 
if (value>trayur x-trayul x) goto 

newmin; 

trayllx “ 500 - value/2; 
traylrx ” 500 + value/2; 
calc_consts( ) ; 
break; 
case 2: 

value ” prompt _mes( "Enter new track 

height (10-600)", 

10,600,traylly-trayuly) ; 
trayuly ” 350 - value/2; 
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traylly = 350 + value/2; 
trayury ** trayuly; traylry =» traylly; 
calc_consts( ) ; 
break; 
case 3: 

value = prompt _mes( "Enter adjustment 
(+=up -=down max 200) ", 

- 200 , 200 , 0 ); 
trayuly -*» value; 
traylly -» value; 

trayury ** trayuly; traylry =» traylly; 
calc_consts( ) ; 
break; 
default : 

print f <" II legal menu item number!\n"); 
break; 

> /^switch item_num*/ 

> 

else if <menu_num*“l ) i 
switch (item_num) ( 
case Ot 

numsegs ■ prompt _mes< "Enter number of 
trellis segments (1-100)", 

1 , 100, num.segs) ; 
calc_consts( ) ; 
break; 
case It 

num_trels ■ prompt_mes ( "Enter number 
of trellises (1-50)", 

1 , 50, num_trel s) ; 
calc_consts( ) ; 
break; 
case 2t 

max_stretch_angl e ■ prompt_mes( "Enter 
max stretch angle (1-45)", 

l,45,max_stretch_angle) ; 
calc_consts( ) ; 
break; 
default: 

printf ("Illegal menu item number !\n"); 
break; 

> /^switch item_num*/ 

> 

else if (menu_num sssB 2) i 
switch (item_num) ( 
case 0: 

timeconst = prompt mes( "Enter timing 
constant (1-1000)", 

1 , 1000, timeconst ) ; 
break; 
case 1: 

animate_flag « FALSE; 
break; 
case 2: 
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animate_flag ■ TRUE; 

ClearMenuStrip(w) ; 
SetMenuStrip(w,&menustop) ; 
break; 
default s 

printf ("Illegal menu item number !\n"); 
break; 

> /*switch item num*/ 


else if (menu_num=*3) <. 
switch (item_num> < 
case Os 

mx = (FL0AT)ScreenX/1000; my * 

( FLOAT ) Sc reenY/700; 

m30. Flags = ITEIiTEXT 5 HIGHCOMP » 
ITEMENABLED ! CHECK IT S CHECKED; 

m31. Flags - ITEMTEXT ! HIGHCOMP I 
ITEMENABLED I CHECK IT; 


/♦white*/ 

/♦white*/ 

/♦grey*/ 

/♦purple*/ 


case Is 

mx * <FL0AT)ScreenX/955. 55; my « 
< FLOAT ) Sc r een Y/700 ; 

m30. Flags = ITEMTEXT i HIGHCOMP I 
CHECK IT; 

m31. Flags - ITEMTEXT 1 HIGHCOMP I 


SetRGB4(vp, 

o 

r 

OL, OL, OL); 

SetRGB4< vp, 

1L, 

15L f 15L r 15L); 

SetRGB4 ( vp , 

2L, 

9L f 9L, 9L); 

SetRGB4(vp, 

5L, 

12L, 5L, 15L) ; 

break; 




ITEMENABLED 


ITEMENABLED 


CHECK IT 


CHECKED; 



SetRGB4(vp, 

o 

r 

15L, 15L, 15L); 

/♦white*/ 

SetRGB4(vp, 

2L, 

OL, OL, OL); 

/♦grey*/ 

SetRGB4(vp, 

5L, 

15L, 15L, 15L); 

/♦purple*/ 

break; 

defaults 




pr int f < " 11 1 egal menu item number 


break; 




> /*switch item_ 

num*/ 


/ 

else 

if (menu_num == 

' 31) 

< 


animate_flag = FALSE; 
ClearMenuStrip(w) ; 

Set MenuSt r i p < w , &menu 1 > ; 

> 

else C 

pr int f < " II legal menu number !\n")j 
break; 


40 



> /*i f menu_num*/ 
defaul t : 
break; 

> /*switch class*/ 

> /*while message*/ 

> 

LONG pr ompt _mes < st r i ng , mi n , max ,curr ent ) 

LONG min, max, current; 
char stringC3; i 
LONG value; 

ULONG class; 

struct IntuiMessage *message; 

ClearMenuStrip(w) ; 

ClipBlittrp, 90,50, fcrpbuff, 90,50, ScreenX-160, 80, 
OxCO) ; 

SetAPen(rp, 0); 

SetOPen(rp, 1>; 

RectFi 1 1 (rp, 100,60, Scr eenX-100, 120) ; 

SetAPen(rp, 1); 
gtext.IText = string; 

gtext . LeftEdge * 102 - 4*str 1 en <str ing) ; 
itoa (cur rent , dobuf fer > ; 
itoa(current , undobuf fer ) ; 

AddGadget(w, ^gadget, 0); 

Refr eshGadgets(&gadget , w,NULL) ; 
value ■ min-1; 

while (value<min it value>max) ( 
class = NULL; 

while (class ! ™ GADGETUP) < 

message = (struct IntuiMessage 
*)GetMsg (w->UserPort ) ; 

class = message- >C1 ass; 

> 

value « atoi (dobuf fer ) ; 

> 

RemoveGadget ( w, &gadget > ; 

Cl ipBl it (ferpbuf f , 80,50, rp, 80,50, ScreenX-170, 80, 
OxCO); 

Set MenuSt r i p ( w , &menu 1 ) ; 
return(value) ; 


itoa(n,s) 
char sC3; 

LONG n; ( 

SHORT i,sign; 
if ((sign=n)<0) n = -n; 
i “ 0; 
do ( 

sC i ++3 * n7.10 + »0» ; 

> while ( (n /=» 10) > 0); 
if (sign<0) sCi++3 * f ~ f t 
sC i 3 = r \0 r ; 
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reverse(s) ; 


reverse(s) 
char sC3; { 

SHORT c,i,j; 

for (i=0, j=strlen(s)-l; i < J ; i++, j — > <■ 
c * sCi 3 ; 
sC i 3 = sC j 3 ; 
sC j 3 = c ; 

> 


main (> C 
USHORT i,j; 

IntuitionBase “ (IBPtr) 

OpenLibrary ( "intui t ion. 1 ibrary" , OL) ; 

Gf xBase » (GBPtr) OpenLibrary ( "graphics. 1 ibrary" r OL)j 
if < IntuitionBase && Qf xBase) < 

if (nw. Screen - s = OpenScreen (&ns) ) { 
if ( ! (w ■ OpenWindow(&nw) ) ) < 

Cl oseSc r een < s ) ; 
goto out; 

> 

> else < /^screen not opened*/ 
goto out; 

> 

/*ShowTitle(s, 1L>;*/ 

vp = &w->W3creen->Vi ewPort ; rp = 8«s->RastPor t ; 
InitBitMap(S<bmbuf f ,3, Screen X, Screen Y) ; 
for (i**0; i<3; i++) < 
if ( (bmbuf f .PlanesCi 3 = 

(PLANEPTR)Al locRaster (ScreenX,ScreenY> )==NULL) C 
pr int f < "Could not get video memory!!! 

Qr r r r ! ! ! \ n " ) ; 

if <i> {for <j=0; j<i; j++> 

Fr eeRaster (bmbuf f . PlanesC j 3 , ScreenX, Screen Y> ; > 
goto big_out; 

> 

> 

Ini tRastPort (Scrpbuf f ) ; rpbuf f . Bit Map = Stbmbuff; 
set_color_registers( ) ; set_menu( ) ; 

ScreenToFront (s) ; SetMenuStr ip (w, &menul ) ; 
ini t_vars( ) ; 

main_program< ) ; 

Cl ear MenuStr ip (w> ; 

for (i=0; i<3; i++> Fr eeRaster (bmbuf f. PI anesC i 3 , 

Sc r een X , Sc r een Y ) ; 
big_out : 

ScreenToBack (s) ; 

CloseWindow(w) ; Cl oseScreen (s) ; 
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> 

out : 

if (GfxBase) CloseLibrary (Gf xBase) ; 

if ( IntuitionBase) CloseLibrary ( IntuitionBase) ; 

> 


set_color_registers( ) < 


SetRGB4( vp, 

OL, 

OL, 

OL, 

OL); 

/Kb lack*/ 

SetRGB4(vp, 

1L, 

15L, 

15L, 

15L); 

/*white*/ 

SetRGB4(vp, 

2L, 

9L, 

9L, 

9L) ; 

/*grey*/ 

SetRGB4(vp, 

3L, 

3L, 

3L, 

13L); 

/*blue*/ 

SetRGB4(vp, 

4L y 

1L, 

9L, 

1L); 

/*gr een*/ 

SetRGB4(vp, 

5L, 

12L, 

5L, 

15L) ; 

/*purple*/ 

SetRGB4(vp, 

6L y 

15L, 

14L, 

OL); 

/*yel low*/ 

Set RGB4 ( vp , 

7L, 

10L, 

10L, 

12L) ; 

/*si 1 ver*/ 


SetDrMd(rp, JAM1); SetAPen(rp, 1L) ; 

Sat Dr Md ( &r pbu f f , JAM1 ) ; Set APen (fcrpbuf f , 1L); 


main_program() i 
while ( ! done) < 

if (animate_f lag) animateO; 
get_input < ) ; 

> 

> 

draw_tray() ( 

Set APen (&r pbu f f , 2L); 

Move (&r pbu f f , 

(LONG) (trayulxtmx), (LONG) (trayuly*my) ) ; 
Draw(&rpbuf f , 

(LONG) ( (trayulx— 10)*mx) , (LONG) (trayuly*my) ) ; 
Dr aw(&rpbuf f , 

(LONG) ( (trayl 1 x-10)*mx) , (LONG) (trayl ly*rny ) ) ; 
Dr aw(&rpbuf f , 

(LONG) (trayl 1 x*mx) , (LONG) (trayl ly*rr»y) ) ; 

Dr aw(&rpbuf f , 

(LONG) (trayul x*mx) , (LONG) (trayuly*my) ) ; 
Move(&rpbuf f , 

(LONG) (trayurx*mx) , (LONG) (trayury*my) ) ; 

Dr aw(&rpbuf f , 

(LONG) ( (trayurx+10)*mx) , (LONG) (trayury*my) ) ; 
Dr aw(&rpbuf f , 

(LONG) ( (traylrx+10)*mx) , (LONG) (trayl ry*my) ) ; 
Draw(&rpbuf f , 

(LONG) (traylr x*mx) , (LONG) (trayl ry*my) ) ; 

Dr aw (&r pbu f f , 

(LONG) (trayurx*mx) , (LONG) (trayury*my) ) ; 


ini t_vars( ) ( 
trayulx = 232; 
trayl lx = 462; 
trayl rx = 538; 
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trayurx = 768; 
trayuly = 60; 
trayury ■ 60; 
traylly ■ 614; 
traylry * 614; 
num_segs = 6; 
num_trels =7; 
max_stretch_angle = 5; 
timeconst = 50; 

mx = ( FLOAT ) Sc r «en X / 1 000 ; my = <FL0AT)ScreenY/700; 
calc_consts<) ; 

> 

calc_consts() i 

xdiff ■ trayllx - trayulx; 
ydiff = traylry - trayury; 
num_divs = 2 + 2*<num_segs - 2); 
bar_length = 

(FLOAT) (trayul x-trayur x) /num_di vs/cos(max_stretch_angle/ 
57.29578); 

init_trel 1 is«s( ) ; 


Cr eat elies ( x , 1 e f t , t op , mesg ) 
struct IntuiText *x; 
short left, top; 

UBYTE *mesg; < 

x->FrontPen 31 0; x->BackPen “ 1; 
x->DrawMode = JAM1; 

x->LeftEdge " left; x->TopEdge =* top; 
x->ITextF ont » NULL; 
x- > I Text * mesg; 
x->NextText » NULL; 


Createltem(name, item, next , left, top, flags) 

UBYTE Rename; 

USH0RT left, top; 

UL0NG flags; 
struct Menultem *item; 
struct Menultem *next; < 
i tern- >Next Item * next; 
i tem->Lef tEdge ■ left; 
item->TopEdge = top; 
item->Width ■ 250; 
item->Height = 10; 

i tem->Fl ags = ITEMTEXT I HIGHCOMP l ITEMENABLED ! 
flags; 

item->Mutual Exclude * NULL; 
i tem->ItemFi 1 1 » (APTR)name; 
item->SelectFi 1 1 = NULL; 
i tem->Command = NULL; 
i tem->SubItem = NULL; 

> 


44 


set menu O { 


Cr eat eMes < Set 0, CHECKWIDTH+2, 
CreateItem(S<tO, &m0, 8<ml, 5, 
Cr eat eMes ( 8<t 1 , CHECKWIDTH+2, 
CreateItem(S<t 1 , S<ml , &m2, 5, 
Cr eat eMes < Set 2 , CHECKWIDTH+2, 
CreateItem(S<t2, Sem2, Sem3, 5, 
Cr eat eMes < Set 3 , CHECKWIDTH+2, 
CreateItem(Set3, 8em3, NULL, S, 
Cr eat eMes ( Set 1 0 , CHECKWIDTH+2, 
segments" ) ; 

CreateltemCSet 10, SemlO, Semll, 
Cr eat eMes ( Set 1 1 , CHECKWIDTH+2, 


1 , "Alter max width"); 


0, 

0); 


If 

"Alter 

min width"); 

10, 

0); 


If 

"Alter 

height"); 

20, 

0); 


If 

"Shi ft 

vertical ly" ) 

30 

0); 


If 

"A1 ter 

num of 

5, 

0, 0); 


If 

"Alter 

num of 


trel 1 ises" ) ; 

CreateItem<Set 1 1 , Semll, Seml2, 5, 10, 0); 

Cr eat eMes ( Set 1 2 , CHECKWIDTH+2, 1, "Alter max stretch 
angle"); 

Cr eat el tem (Set 12, 8eml2, NULL, 5, 20, 0); 

Cr eat elies < Set 20 , CHECKWIDTH+2, 1, "Change speed"); 
CreateItem(Set20, Sem20, Sem21, 5, 0, 0); 

Cr eat elies ( Set 2 1 , CHECKWIDTH+2, 1, "Stop"); 
CreateItem(Set21 , Sem21, Sem22, 5, 10, 0); 
m21. Flags 9 ITEMTEXT ! HIGHCOMP ; 

Cr eat elies (Set 22 , CHECKWIDTH+2, 1, "Start"); 

Cr eat e 1 1 em < Set 22 , 8em22, NULL, 5, 20, 0); 
m22. Flags = ITEMTEXT ! HIGHCOMP S ITEMENABLED ! 
CHECK IT I CHECKED; 


Cr eat eMes ( Set 30 , CHECKWIDTH+2, 1, "Set for screen"); 
Cr eat e 1 1 em (&t 30 , Sem30 , &m3 1, 5, 0, 0); 
m30. Flags - ITEMTEXT ! HIGHCOMP ! ITEMENABLED i 
CHECK IT ! CHECKED; 

Cr eat eMes ( Set 3 1 , CHECKWIDTH+2, 1, "set for printer"); 
Cr eat eItem(Set31, Sem31, NULL, 5, 10, 0) ; 
m3 1. Flags * ITEMTEXT I HIGHCOMP ! ITEMENABLED S 
CHECKIT; 

menul . Next Menu = &menu2; 

menul .LeftEdge = 0; menul . TopEdge 9 0; 

menul. Width - 100; menul. Height - 100; 

menul. Flags 9 MENUENABLED; 

menul . MenuName 9 "Track"; 

menul .First Item 9 SemO; 

menu2. NextMenu * SemenuS; 

menu2. LeftEdge =» 100; menul . TopEdge 9 0; 

menu2. Width 9 100; menul. Height 9 100; 

menu2. Flags 9 MENUENABLED; 

menu2. MenuName 9 "Trellis"; 

menu2. Fi r st Item 9 SemlO; 

menu3. NextMenu 9 Semenu4; 

menu3. LeftEdge 9 200; menul . TopEdge 9 0; 
menu3. Width 9 100; menul. Height 9 100; 
menu3. Flags 9 MENUENABLED; 
menu3. MenuName 9 "Animation"; 
menu3. First Item 9 Sem20; 
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rnenu4. NextMenu = NULL; 

menu4.LeftEdge = 300; menul . TopEdge = 0; 
menu4. Width = 100; menu 1 . Height = 100; 
menu4. Flags = MENUENABLED; 
menu4. MenuName = "Aspect ratio"; 
menu4. Fi rst Item = &m30; 
menustop. Next Menu = NULL; 

menust op . Le f t Edge = 0; menul . TopEdge ■ 0; 
menust op. Width = ScreenX-2; menul. Height = 10; 
menust op. Flags = MENUENABLED; 
menust op. MenuName = " 

Stop Animation!"; 

menust op. First Item = NULL; 

> 
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APPENDIX B 



The following is the derivation and results of the 
calculations for efficiency of the trapezoidal tray arrangement 
measured against mature plant spacing in concentric circles. 


Results of Volume Calculations: 
Unlabeled values are in cubic inches. 


Mature height: 36 

inches 

Mature width: 

12 inches 

Cylinder diameter 

: 82 inches 

Minimum width: 

3.5125 inches 
• 

Area 

Single Tray 

Percent of 

Eight Tray 

Description 

Volume 

Total Volume 

Volume 

Plants 

60,363 

45.8 

482,901 

Lights 

8,089 

6.1 

64,712 

Support 

24,267 

18.4 

194,135 

Plants, lights 

92,719 

70.3 

741,748 


and support 


Triangular 
empty space 
Central empty 
space 
Torroidal 
empty space 
Total empty 
space 


Summed Total 
volume 

131,714 

99.9 

1,053,709 

Calculated Total 
volume 

132,403 

100.0 

1,059,222 

Cylinder volume 

137,306 

100.0 

1,098,452 

Control volume 

137,306 

100.0 

1,098,452 

Number of plants 
in trapezoid 
design 

21 


168 

Number of plants 
in cylinder 

17.75 


142 

Percent increase 

in number 

of plants 

+18 % 


23,827 

18.1 

190,613 

3,570 

• 

M 

28,564 

11,598 

CO 

• 

00 

92,784 

38,995 

29.6 

311,961 
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Results of Efficiency Calculations (Figure 10) 


Volume Description 


Volume/Plant % Difference 


Plant volume for trapezoid 
Plant volume for control 


Plant, light, and tray 
volume for trapezoid 
Plant, light, and tray 
volume for control 


Total volume for trapezoid 
Total volume for control 


2,874 

5,355 

-46 % 


4,415 

7,141 

-38 % 

6,272 

7,141 

-12 % 
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